home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 4 / Amiga Tools 4.iso / tools / netzwerk / tcp-ip / yam1.0 / install / install_yam < prev   
Text File  |  1996-02-14  |  3KB  |  68 lines
  1. ;YAM Installation script
  2. ;by Marcel Beck
  3.  
  4. (complete 0)
  5.  
  6. (if (= @language "english")
  7.    (
  8.    (set locale 0)
  9.    (set #bad-MUI     (cat "You need at least MUI3.1 to use YAM."))
  10.    (set #no-AmiTCP   (cat "\"AmiTCP:\" assign not found.\nYAM needs at least AmiTCP 2.3 to run.\nMake shure AmiTCP is installed properly."))
  11.    (set #dir-choice  (cat "Select the directory where YAM has to be installed." ))
  12.    (set #copy        (cat "Copying YAM"))
  13.    (set #doc-choice  (cat "Where do you want to install the documentation?\nIf you want the HELP key to work you should use the given path."))
  14.    (set #doc-copy    (cat "Copying Documentation"))
  15.    (set #cat-copy    (cat "Copying Catalog"))
  16.    (set #modify_ss   (cat "Adding YAM assign to your \"s:user-startup\" file."))
  17.    ))
  18.  
  19. (if (= @language "deutsch")
  20.    (
  21.    (set locale 2)
  22.    (set #bad-MUI     (cat "Sie benötigen mindestens MUI3.1, um YAM zu nutzen."))
  23.    (set #no-AmiTCP   (cat "\"AmiTCP:\" Zuweisung nicht gefunden.\nYAM benötigt mindestens AmiTCP 2.3.\nStellen Sie sicher, dass AmiTCP ordnungsgemäss installiert ist"))
  24.    (set #dir-choice  (cat "Wählen Sie das Verzeichnis aus, in welches YAM installiert werden soll."))
  25.    (set #copy        (cat "Kopiere YAM"))
  26.    (set #doc-choice  (cat "Wohin möchten Sie die Dokumentation kopieren ?\nWenn Sie möchten, dass die HELP-Taste funktioniert, sollten Sie das vorgeschlagene Verzeichnis benutzen."))
  27.    (set #doc-copy    (cat "Kopiere Dokumentation"))
  28.    (set #cat-copy    (cat "Kopiere Katalog"))
  29.    (set #modify_ss   (cat "Erstelle YAM Zuweisung in Ihrer \"s:user-startup\"-Datei."))
  30.    ))
  31.  
  32. (set versionnumber (getversion "MUI:MUI"))
  33. (set version (/ versionnumber 65536))
  34. (if (< version 11 )
  35.    ((message #bad-MUI) (if (= @user-level 0) (abort "Couldn't find MUI >=V11"))))
  36.  
  37. (set yam-dir "AmiTCP:")
  38. (if (NOT(exists "AmiTCP:" (noreq)))
  39.    ((message #no-AmiTCP) (if (= @user-level 0) (abort "Couldn't find AmiTCP:"))))
  40.  
  41. (set yam-dir (askdir (prompt #dir-choice) (default yam-dir) (help @askdir-help)))
  42. (set @default-dest (tackon yam-dir "YAM"))
  43. (makedir @default-dest (infos))
  44.  
  45. (complete 20)
  46. (copyfiles (prompt #copy) (source "/YAM") (newname "YAM") (help @copyfiles-help) (infos) (dest @default-dest))
  47. (copyfiles (source "/Icons") (all) (dest (cat @default-dest "/Icons")))
  48. (copyfiles (source "/Rexx") (all) (dest (cat @default-dest "/Rexx")))
  49.  
  50. (complete 40)
  51. (set doc-dir @default-dest)
  52. (set doc-dir (askdir (default @default-dest) (prompt #doc-choice) (help @askdir-help)))
  53. (copyfiles (prompt #doc-copy) (source (cat "/Docs/YAM_" @language ".guide")) (newname "YAM.guide")
  54.    (help @copyfiles-help) (infos) (optional force) (dest doc-dir))
  55.  
  56. (complete 60)
  57. (if locale (
  58.    (copyfiles (prompt #cat-copy) (source (cat "/Catalogs/" @language "/YAM.catalog"))
  59.       (newname "YAM.catalog") (help @copyfiles-help) (optional force)
  60.       (dest (cat "LOCALE:Catalogs/" @language))))
  61. )
  62.  
  63. (complete 80)
  64. (makeassign "YAM" @default-dest)
  65. (startup "YAM" (prompt #modify_ss) (help @startup-help) (command "Assign YAM: \"" @default-dest "\"\n"))
  66.  
  67. (complete 100)
  68.